home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / t3_1 / risc_src.lha / risc_sources / sparc / float.c < prev    next >
C/C++ Source or Header  |  1990-01-12  |  671b  |  58 lines
  1. #include <math.h>
  2.  
  3. fladd(z,x,y)
  4. double *x,*y,*z;
  5. {   *z = *x + *y;}
  6.  
  7. flsubtract(z,x,y)
  8. double *x,*y,*z;
  9. {   *z = *x - *y;}
  10.  
  11. flmultiply(z,x,y)
  12. double *x,*y,*z;
  13. {   *z = *x * *y;}
  14.  
  15. fldivide(z,x,y)
  16. double *x,*y,*z;
  17. {   *z = *x / *y;}
  18.  
  19. flless(x,y)
  20. double x,y;
  21. { if (x < y) return 1; return 0;}
  22.  
  23. flequal(x,y)
  24. double x,y;
  25. { if (x == y) return 1; return 0;}
  26.  
  27. flgreater(x,y)
  28. double x,y;
  29. { if (x > y) return 1; return 0;}
  30.  
  31. fix(x)
  32. double x;
  33. { return x;}
  34.  
  35. double flote(x)
  36. long x;
  37. { return x;}         
  38.  
  39. fxmul(x,y)
  40. int x,y;
  41. { return (x*y);}
  42.  
  43.  
  44. fxdiv(x,y)
  45. int x,y;
  46. { return (x/y);}
  47.  
  48.  
  49. fxrem(x,y)
  50. int x,y;
  51. { return (x%y);}
  52.  
  53.  
  54. hack_sprintf(a,b,c)
  55. char *a,*b;
  56. double *c;
  57. {sprintf(a,b,*c);}
  58.